(directory_files_internal): Set result list to nil

before retrying.

diff --git a/src/dired.c b/src/dired.c
index f3f13534a876231db5bd9d99f468b78a928b7be9..ce2e5cb95b2c2086d47750b43d6451e8d4399594 100644 (file)
--- a/src/dired.c
+++ b/src/dired.c
@@ -312,7 +312,10 @@ directory_files_internal (directory, full, match, nosort, attrs)
   specpdl_ptr = specpdl + count;
 
   if (retry_p)
-    goto retry;
+    {
+      list = Qnil;
+      goto retry;
+    }
 
   if (NILP (nosort))
     list = Fsort (Fnreverse (list),